home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC Gamer (Italian) 35
/
PC Gamer IT CD 35 2-2.iso
/
utility
/
prokal63
/
ProKalc.exe
/
0
/
RCDATA
/
TAREAFORM
/
TAREAFORM.txt
< prev
Wrap
Text File
|
1998-09-10
|
115KB
|
3,784 lines
object AreaForm: TAreaForm
Left = 369
Top = 219
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
BorderStyle = bsDialog
Caption = 'Area Calculation'
ClientHeight = 277
ClientWidth = 484
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = []
Scaled = False
OnActivate = FormActivate
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 16
object AreaNotebook: TPageControl
Left = 0
Top = 0
Width = 484
Height = 277
ActivePage = Tabsheet1
Align = alClient
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
HotTrack = True
MultiLine = True
ParentFont = False
TabOrder = 0
object Tabsheet1: TTabSheet
Caption = 'Circle'
object CircleImage: TImage
Left = 0
Top = 0
Width = 150
Height = 150
Picture.Data = {<image000.bmp>}
end
object AreaLabel: TLabel
Left = 246
Top = 20
Width = 63
Height = 16
Caption = 'Area (A) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object RadiusLabel: TLabel
Left = 237
Top = 54
Width = 72
Height = 16
Caption = 'Radius (r) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object DiameterLabel: TLabel
Left = 219
Top = 86
Width = 90
Height = 16
Caption = 'Diameter (d) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object PerimeterLabel: TLabel
Left = 214
Top = 120
Width = 95
Height = 16
Caption = 'Perimeter (p) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object CircleMemo: TMemo
Left = 22
Top = 162
Width = 107
Height = 69
TabStop = False
Alignment = taCenter
BorderStyle = bsNone
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
Lines.Strings = (
'Enter any '
'known '
'value, then '
#39'Solve'#39'.')
ParentColor = True
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 8
end
object CircleAreaEdit: TMemo
Left = 324
Top = 14
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 10
ParentFont = False
TabOrder = 0
WantReturns = False
WordWrap = False
OnKeyUp = CircleAreaEditKeyUp
end
object CircleRadiusEdit: TMemo
Left = 324
Top = 48
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 10
ParentFont = False
TabOrder = 1
WantReturns = False
WordWrap = False
OnKeyUp = CircleRadiusEditKeyUp
end
object CircleDiameterEdit: TMemo
Left = 324
Top = 82
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 10
ParentFont = False
TabOrder = 2
WantReturns = False
WordWrap = False
OnKeyUp = CircleDiameterEditKeyUp
end
object CirclePerimeterEdit: TMemo
Left = 324
Top = 116
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 10
ParentFont = False
TabOrder = 3
WantReturns = False
WordWrap = False
OnKeyUp = CirclePerimeterEditKeyUp
end
object CircleClearBtn: TBitBtn
Left = 172
Top = 200
Width = 70
Height = 24
Caption = 'C&lear'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnClick = CircleClearBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
555557777F777555F55500000000555055557777777755F75555005500055055
555577F5777F57555555005550055555555577FF577F5FF55555500550050055
5555577FF77577FF555555005050110555555577F757777FF555555505099910
555555FF75777777FF555005550999910555577F5F77777775F5500505509990
3055577F75F77777575F55005055090B030555775755777575755555555550B0
B03055555F555757575755550555550B0B335555755555757555555555555550
BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
50BB555555555555575F555555555555550B5555555555555575}
NumGlyphs = 2
end
object CircleSolveBtn: TBitBtn
Left = 246
Top = 200
Width = 70
Height = 24
Caption = '&Solve'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
OnClick = CircleSolveBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
0333337F777777737F333308888888880333337F333333337F33330888888888
03333373FFFFFFFF733333700000000073333337777777773333}
NumGlyphs = 2
end
object AreaCloseBtn: TBitBtn
Left = 320
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnClick = AreaCloseBtnClick
Kind = bkClose
end
object AreaHelpBtn: TBitBtn
Left = 394
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
OnClick = AreaHelpBtnClick
Kind = bkHelp
end
end
object TabSheet2: TTabSheet
Caption = 'Circular Ring'
object CircRingImage: TImage
Left = 2
Top = 2
Width = 150
Height = 150
Picture.Data = {<image001.bmp>}
end
object CircRingAreaLabel: TLabel
Left = 248
Top = 18
Width = 63
Height = 16
Caption = 'Area (A) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object CircRingShortRLabel: TLabel
Left = 202
Top = 50
Width = 109
Height = 16
Caption = 'Inner Radius (r) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object CircRingLongRLabel: TLabel
Left = 196
Top = 86
Width = 115
Height = 16
Caption = 'Outer Radius (R) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object CircRingExp: TMemo
Left = 18
Top = 172
Width = 115
Height = 55
TabStop = False
Alignment = taCenter
BorderStyle = bsNone
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
Lines.Strings = (
'Enter two known '
'value, then '
#39'Solve'#39'.')
ParentColor = True
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 7
end
object CircRingAreaEdit: TMemo
Left = 324
Top = 14
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 0
WantReturns = False
WordWrap = False
OnKeyUp = CircRingAreaEditKeyUp
end
object CircRingShortREdit: TMemo
Left = 324
Top = 48
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 1
WantReturns = False
WordWrap = False
OnKeyUp = CircRingShortREditKeyUp
end
object CircRingLongREdit: TMemo
Left = 324
Top = 82
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 2
WantReturns = False
WordWrap = False
OnKeyUp = CircRingLongREditKeyUp
end
object CircRingClearBtn: TBitBtn
Left = 172
Top = 200
Width = 70
Height = 24
Caption = 'C&lear'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnClick = CircRingClearBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
555557777F777555F55500000000555055557777777755F75555005500055055
555577F5777F57555555005550055555555577FF577F5FF55555500550050055
5555577FF77577FF555555005050110555555577F757777FF555555505099910
555555FF75777777FF555005550999910555577F5F77777775F5500505509990
3055577F75F77777575F55005055090B030555775755777575755555555550B0
B03055555F555757575755550555550B0B335555755555757555555555555550
BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
50BB555555555555575F555555555555550B5555555555555575}
NumGlyphs = 2
end
object CircRingSolveBtn: TBitBtn
Left = 246
Top = 200
Width = 70
Height = 24
Caption = '&Solve'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnClick = CircRingSolveBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
0333337F777777737F333308888888880333337F333333337F33330888888888
03333373FFFFFFFF733333700000000073333337777777773333}
NumGlyphs = 2
end
object CircRingCloseBtn: TBitBtn
Left = 320
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
Kind = bkClose
end
object CircRingHelpBtn: TBitBtn
Left = 394
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnClick = AreaHelpBtnClick
Kind = bkHelp
end
end
object TabSheet3: TTabSheet
Caption = 'Ellipse'
object EllipseImage: TImage
Left = -2
Top = 0
Width = 150
Height = 150
Picture.Data = {<image002.bmp>}
end
object EllipseAreaLabel: TLabel
Left = 246
Top = 18
Width = 63
Height = 16
Caption = 'Area (A) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object EllipseMinorEdit: TLabel
Left = 210
Top = 52
Width = 99
Height = 16
Caption = 'Minor Axis (a) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object EllipseMajorLabel: TLabel
Left = 210
Top = 88
Width = 99
Height = 16
Caption = 'Major Axis (b) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object EllipseExp: TMemo
Left = 28
Top = 162
Width = 101
Height = 75
TabStop = False
Alignment = taCenter
BorderStyle = bsNone
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
Lines.Strings = (
'Enter two '
'known '
'values, then '
#39'Solve'#39'.')
ParentColor = True
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 7
end
object EllipseAreaEdit: TMemo
Left = 324
Top = 14
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 0
WantReturns = False
WordWrap = False
OnKeyUp = EllipseAreaEditKeyUp
end
object EllipseAEdit: TMemo
Left = 324
Top = 50
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 1
WantReturns = False
WordWrap = False
OnKeyUp = EllipseAEditKeyUp
end
object EllipseBEdit: TMemo
Left = 324
Top = 86
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 2
WantReturns = False
WordWrap = False
OnKeyUp = EllipseBEditKeyUp
end
object EllipseClearBtn: TBitBtn
Left = 172
Top = 200
Width = 70
Height = 24
Hint = 'Clear all values'
Caption = 'C&lear'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnClick = EllipseClearBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
555557777F777555F55500000000555055557777777755F75555005500055055
555577F5777F57555555005550055555555577FF577F5FF55555500550050055
5555577FF77577FF555555005050110555555577F757777FF555555505099910
555555FF75777777FF555005550999910555577F5F77777775F5500505509990
3055577F75F77777575F55005055090B030555775755777575755555555550B0
B03055555F555757575755550555550B0B335555755555757555555555555550
BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
50BB555555555555575F555555555555550B5555555555555575}
NumGlyphs = 2
end
object EllipseSolveBtn: TBitBtn
Left = 246
Top = 200
Width = 70
Height = 24
Hint = 'Solve for unknown'
Caption = '&Solve'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnClick = EllipseSolveBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
0333337F777777737F333308888888880333337F333333337F33330888888888
03333373FFFFFFFF733333700000000073333337777777773333}
NumGlyphs = 2
end
object EllipseCloseBtn: TBitBtn
Left = 320
Top = 200
Width = 70
Height = 24
Hint = 'Back to calculator'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
Kind = bkClose
end
object EllipseHelpBtn: TBitBtn
Left = 394
Top = 200
Width = 70
Height = 24
Hint = 'Get help'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnClick = AreaHelpBtnClick
Kind = bkHelp
end
end
object TabSheet4: TTabSheet
Caption = 'Parallelogram'
object ParallelImage: TImage
Left = 0
Top = 0
Width = 150
Height = 150
Picture.Data = {<image003.bmp>}
end
object ParallelAreaLable: TLabel
Left = 244
Top = 18
Width = 63
Height = 16
Caption = 'Area (A) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object ParallelASideLabel: TLabel
Left = 249
Top = 54
Width = 58
Height = 16
Caption = 'side (a) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object ParallelBSideLabel: TLabel
Left = 249
Top = 90
Width = 58
Height = 16
Caption = 'side (b) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object ParallelMemo: TMemo
Left = 24
Top = 170
Width = 101
Height = 55
TabStop = False
Alignment = taCenter
BorderStyle = bsNone
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
Lines.Strings = (
'Enter two '
'known values, '
'then '#39'Solve'#39'.')
ParentColor = True
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 7
end
object ParallelAreaEdit: TMemo
Left = 324
Top = 14
Width = 129
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 0
WantReturns = False
WordWrap = False
OnKeyUp = ParallelAreaEditKeyUp
end
object ParallelASideEdit: TMemo
Left = 324
Top = 50
Width = 129
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 1
WantReturns = False
WordWrap = False
OnKeyUp = ParallelASideEditKeyUp
end
object ParallelBSideEdit: TMemo
Left = 324
Top = 86
Width = 129
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 2
WantReturns = False
WordWrap = False
OnKeyUp = ParallelBSideEditKeyUp
end
object ParallelClearBtn: TBitBtn
Left = 172
Top = 200
Width = 70
Height = 24
Caption = 'C&lear'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnClick = ParallelClearBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
555557777F777555F55500000000555055557777777755F75555005500055055
555577F5777F57555555005550055555555577FF577F5FF55555500550050055
5555577FF77577FF555555005050110555555577F757777FF555555505099910
555555FF75777777FF555005550999910555577F5F77777775F5500505509990
3055577F75F77777575F55005055090B030555775755777575755555555550B0
B03055555F555757575755550555550B0B335555755555757555555555555550
BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
50BB555555555555575F555555555555550B5555555555555575}
NumGlyphs = 2
end
object ParallelSolveBtn: TBitBtn
Left = 246
Top = 200
Width = 70
Height = 24
Caption = '&Solve'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnClick = ParallelSolveBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
0333337F777777737F333308888888880333337F333333337F33330888888888
03333373FFFFFFFF733333700000000073333337777777773333}
NumGlyphs = 2
end
object ParallelCloseBtn: TBitBtn
Left = 320
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
Kind = bkClose
end
object ParallelHelpBtn: TBitBtn
Left = 394
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnClick = AreaHelpBtnClick
Kind = bkHelp
end
end
object TabSheet5: TTabSheet
Caption = 'Parabola'
object ParabolaImage: TImage
Left = 0
Top = 0
Width = 150
Height = 150
Picture.Data = {<image004.bmp>}
end
object ParabolaAreaLabel: TLabel
Left = 250
Top = 18
Width = 63
Height = 16
Caption = 'Area (A) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object ParabolaBaseLabel: TLabel
Left = 250
Top = 50
Width = 63
Height = 16
Caption = 'Base (b) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object ParabolaHeightLabel: TLabel
Left = 240
Top = 86
Width = 73
Height = 16
Caption = 'Height (h) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object ParabolaExp: TMemo
Left = 32
Top = 158
Width = 85
Height = 71
TabStop = False
Alignment = taCenter
BorderStyle = bsNone
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
Lines.Strings = (
'Enter two '
'known '
'values, then '
#39'Solve'#39'.')
ParentColor = True
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 7
end
object ParabolaAreaEdit: TMemo
Left = 326
Top = 14
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 0
WantReturns = False
WordWrap = False
OnKeyUp = ParabolaAreaEditKeyUp
end
object ParabolaBaseEdit: TMemo
Left = 326
Top = 48
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 1
WantReturns = False
WordWrap = False
OnKeyUp = ParabolaBaseEditKeyUp
end
object ParabolaHeightEdit: TMemo
Left = 328
Top = 82
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 2
WantReturns = False
WordWrap = False
OnKeyUp = ParabolaHeightEditKeyUp
end
object ParabolaClearBtn: TBitBtn
Left = 172
Top = 200
Width = 70
Height = 24
Caption = 'C&lear'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnClick = ParabolaClearBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
555557777F777555F55500000000555055557777777755F75555005500055055
555577F5777F57555555005550055555555577FF577F5FF55555500550050055
5555577FF77577FF555555005050110555555577F757777FF555555505099910
555555FF75777777FF555005550999910555577F5F77777775F5500505509990
3055577F75F77777575F55005055090B030555775755777575755555555550B0
B03055555F555757575755550555550B0B335555755555757555555555555550
BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
50BB555555555555575F555555555555550B5555555555555575}
NumGlyphs = 2
end
object ParabolaSolveBtn: TBitBtn
Left = 246
Top = 200
Width = 70
Height = 24
Caption = '&Solve'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnClick = ParabolaSolveBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
0333337F777777737F333308888888880333337F333333337F33330888888888
03333373FFFFFFFF733333700000000073333337777777773333}
NumGlyphs = 2
end
object ParabolaCloseBtn: TBitBtn
Left = 320
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
Kind = bkClose
end
object ParabolaHelpBtn: TBitBtn
Left = 394
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnClick = AreaHelpBtnClick
Kind = bkHelp
end
end
object TabSheet6: TTabSheet
Caption = 'Quadrant'
object QuadrantImage: TImage
Left = 2
Top = 0
Width = 150
Height = 150
Picture.Data = {<image005.bmp>}
end
object QuadrantAreaLabel: TLabel
Left = 250
Top = 22
Width = 63
Height = 16
Caption = 'Area (A) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object QuadrantRadiusLabel: TLabel
Left = 241
Top = 58
Width = 72
Height = 16
Caption = 'Radius (r) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object QuadrantChordLabel: TLabel
Left = 244
Top = 92
Width = 69
Height = 16
Caption = 'Chord (c) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object QuadrantExp: TMemo
Left = 28
Top = 164
Width = 95
Height = 61
TabStop = False
Alignment = taCenter
BorderStyle = bsNone
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
Lines.Strings = (
'Enter any '
'known value, '
'then '#39'Solve'#39'.')
ParentColor = True
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 7
end
object QuadrantAreaEdit: TMemo
Left = 326
Top = 18
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 0
WantReturns = False
WordWrap = False
OnKeyUp = QuadrantAreaEditKeyUp
end
object QuadrantRadiusEdit: TMemo
Left = 326
Top = 54
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 1
WantReturns = False
WordWrap = False
OnKeyUp = QuadrantRadiusEditKeyUp
end
object QuadrantChordEdit: TMemo
Left = 326
Top = 90
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 2
WantReturns = False
WordWrap = False
OnKeyUp = QuadrantChordEditKeyUp
end
object QuadrantClearBtn: TBitBtn
Left = 172
Top = 200
Width = 70
Height = 24
Caption = 'C&lear'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnClick = QuadrantClearBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
555557777F777555F55500000000555055557777777755F75555005500055055
555577F5777F57555555005550055555555577FF577F5FF55555500550050055
5555577FF77577FF555555005050110555555577F757777FF555555505099910
555555FF75777777FF555005550999910555577F5F77777775F5500505509990
3055577F75F77777575F55005055090B030555775755777575755555555550B0
B03055555F555757575755550555550B0B335555755555757555555555555550
BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
50BB555555555555575F555555555555550B5555555555555575}
NumGlyphs = 2
end
object QuadrantSolveBtn: TBitBtn
Left = 246
Top = 200
Width = 70
Height = 24
Caption = '&Solve'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnClick = QuadrantSolveBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
0333337F777777737F333308888888880333337F333333337F33330888888888
03333373FFFFFFFF733333700000000073333337777777773333}
NumGlyphs = 2
end
object QuadrantCloseBtn: TBitBtn
Left = 320
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
Kind = bkClose
end
object QuadrantHelpBtn: TBitBtn
Left = 394
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnClick = AreaHelpBtnClick
Kind = bkHelp
end
end
object TabSheet7: TTabSheet
Caption = 'Rectangle'
object RectangleImage: TImage
Left = 0
Top = 0
Width = 150
Height = 150
Picture.Data = {<image006.bmp>}
end
object RectangleAreaLabel: TLabel
Left = 248
Top = 20
Width = 63
Height = 16
Caption = 'Area (A) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object RectangleASideLabel: TLabel
Left = 250
Top = 54
Width = 61
Height = 16
Caption = 'Side (a) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object RectangleBSideLabel: TLabel
Left = 250
Top = 88
Width = 61
Height = 16
Caption = 'Side (b) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object RectangleDiagonalLabel: TLabel
Left = 222
Top = 122
Width = 89
Height = 16
Caption = 'Diagonal (d) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Memo1: TMemo
Left = 24
Top = 160
Width = 107
Height = 67
TabStop = False
Alignment = taCenter
BorderStyle = bsNone
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
Lines.Strings = (
'Enter two '
'known values, '
'then '#39'Solve'#39'.')
ParentColor = True
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 8
end
object RectangleAreaEdit: TMemo
Left = 326
Top = 16
Width = 129
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 10
ParentFont = False
TabOrder = 0
WantReturns = False
WordWrap = False
OnKeyUp = RectangleAreaEditKeyUp
end
object RectangleASideEdit: TMemo
Left = 326
Top = 50
Width = 129
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 10
ParentFont = False
TabOrder = 1
WantReturns = False
WordWrap = False
OnKeyUp = RectangleASideEditKeyUp
end
object RectangleBSideEdit: TMemo
Left = 326
Top = 84
Width = 129
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 10
ParentFont = False
TabOrder = 2
WantReturns = False
WordWrap = False
OnKeyUp = RectangleBSideEditKeyUp
end
object RectangleDiagonalEdit: TMemo
Left = 326
Top = 118
Width = 129
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 10
ParentFont = False
TabOrder = 3
WantReturns = False
WordWrap = False
OnKeyUp = RectangleDiagonalEditKeyUp
end
object RectangleClearBtn: TBitBtn
Left = 165
Top = 200
Width = 70
Height = 24
Caption = 'C&lear'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnClick = RectangleClearBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
555557777F777555F55500000000555055557777777755F75555005500055055
555577F5777F57555555005550055555555577FF577F5FF55555500550050055
5555577FF77577FF555555005050110555555577F757777FF555555505099910
555555FF75777777FF555005550999910555577F5F77777775F5500505509990
3055577F75F77777575F55005055090B030555775755777575755555555550B0
B03055555F555757575755550555550B0B335555755555757555555555555550
BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
50BB555555555555575F555555555555550B5555555555555575}
NumGlyphs = 2
end
object RectangleSolveBtn: TBitBtn
Left = 239
Top = 200
Width = 75
Height = 24
Caption = '&Solve'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
OnClick = RectangleSolveBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
0333337F777777737F333308888888880333337F333333337F33330888888888
03333373FFFFFFFF733333700000000073333337777777773333}
NumGlyphs = 2
end
object RecCloseBtn: TBitBtn
Left = 318
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
Kind = bkClose
end
object RectangleHelpBtn: TBitBtn
Left = 394
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
OnClick = AreaHelpBtnClick
Kind = bkHelp
end
end
object TabSheet8: TTabSheet
Caption = 'Reg. Polygon'
object PolygonImage: TImage
Left = 0
Top = 0
Width = 150
Height = 150
Picture.Data = {<image007.bmp>}
end
object PolygonAreaLabel: TLabel
Left = 238
Top = 14
Width = 63
Height = 16
Caption = 'Area (A) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object PolygonShortRLabel: TLabel
Left = 229
Top = 44
Width = 72
Height = 16
Caption = 'Radius (r) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object PolygonLongRLabel: TLabel
Left = 225
Top = 76
Width = 76
Height = 16
Caption = 'Radius (R) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object PolygonSideLabel: TLabel
Left = 239
Top = 104
Width = 62
Height = 16
Caption = 'Side (S) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object PolygonExp: TMemo
Left = 24
Top = 164
Width = 111
Height = 67
TabStop = False
Alignment = taCenter
BorderStyle = bsNone
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
Lines.Strings = (
'Enter any known '
'value, then '
#39'Solve'#39'.')
ParentColor = True
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 8
end
object PolygonAreaEdit: TMemo
Left = 314
Top = 10
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 0
WantReturns = False
WordWrap = False
OnKeyUp = PolygonAreaEditKeyUp
end
object PolygonShortREdit: TMemo
Left = 314
Top = 40
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 1
WantReturns = False
WordWrap = False
OnKeyUp = PolygonShortREditKeyUp
end
object PolygonLongREdit: TMemo
Left = 314
Top = 70
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 2
WantReturns = False
WordWrap = False
OnKeyUp = PolygonLongREditKeyUp
end
object PolygonSideEdit: TMemo
Left = 314
Top = 100
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 3
WantReturns = False
WordWrap = False
OnKeyUp = PolygonSideEditKeyUp
end
object PolygonSpinPanel: TPanel
Left = 260
Top = 138
Width = 185
Height = 41
Color = clGray
TabOrder = 9
object PolygonSpinLabel: TLabel
Left = 10
Top = 12
Width = 106
Height = 16
Caption = 'Number of sides:'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object PolygonSpinEdit: TSpinEdit
Left = 132
Top = 7
Width = 41
Height = 26
AutoSize = False
Color = clBlack
Ctl3D = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clYellow
Font.Height = -13
Font.Name = 'System'
Font.Style = [fsBold]
MaxLength = 2
MaxValue = 50
MinValue = 4
ParentCtl3D = False
ParentFont = False
TabOrder = 0
Value = 4
end
end
object PolygonClearBtn: TBitBtn
Left = 172
Top = 200
Width = 70
Height = 24
Caption = 'C&lear'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnClick = PolygonClearBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
555557777F777555F55500000000555055557777777755F75555005500055055
555577F5777F57555555005550055555555577FF577F5FF55555500550050055
5555577FF77577FF555555005050110555555577F757777FF555555505099910
555555FF75777777FF555005550999910555577F5F77777775F5500505509990
3055577F75F77777575F55005055090B030555775755777575755555555550B0
B03055555F555757575755550555550B0B335555755555757555555555555550
BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
50BB555555555555575F555555555555550B5555555555555575}
NumGlyphs = 2
end
object PolygonSolveBtn: TBitBtn
Left = 246
Top = 200
Width = 70
Height = 24
Caption = '&Solve'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
OnClick = PolygonSolveBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
0333337F777777737F333308888888880333337F333333337F33330888888888
03333373FFFFFFFF733333700000000073333337777777773333}
NumGlyphs = 2
end
object PolygonCloseBtn: TBitBtn
Left = 320
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
Kind = bkClose
end
object PolygonHelpBtn: TBitBtn
Left = 394
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
OnClick = AreaHelpBtnClick
Kind = bkHelp
end
end
object TabSheet9: TTabSheet
Caption = 'Sector'
object SectorImage: TImage
Left = -2
Top = 0
Width = 150
Height = 150
Picture.Data = {<image008.bmp>}
end
object SectorAreaLabel: TLabel
Left = 222
Top = 16
Width = 63
Height = 16
Caption = 'Area (A) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object SectorRadiusLabel: TLabel
Left = 213
Top = 52
Width = 72
Height = 16
Caption = 'Radius (r) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object SectorAngleLabel: TLabel
Left = 214
Top = 88
Width = 71
Height = 16
Caption = 'Angle (�) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object SectorArcLabel: TLabel
Left = 188
Top = 86
Width = 97
Height = 16
Caption = 'Arc length (b) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object SectorExp: TMemo
Left = 32
Top = 160
Width = 85
Height = 65
TabStop = False
Alignment = taCenter
BorderStyle = bsNone
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
Lines.Strings = (
'Enter two '
'known '
'values, then '
#39'Solve'#39'.')
ParentColor = True
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 9
end
object SectorAreaEdit: TMemo
Left = 300
Top = 12
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 0
WantReturns = False
WordWrap = False
OnKeyUp = SectorAreaEditKeyUp
end
object SectorRadiusEdit: TMemo
Left = 300
Top = 48
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 1
WantReturns = False
WordWrap = False
OnKeyUp = SectorRadiusEditKeyUp
end
object SectorAngleEdit: TMemo
Left = 300
Top = 84
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 8
Visible = False
WantReturns = False
WordWrap = False
OnKeyUp = SectorAngleEditKeyUp
end
object SectorGroup: TRadioGroup
Left = 198
Top = 118
Width = 251
Height = 63
Caption = 'Sector Type'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ItemIndex = 0
Items.Strings = (
'Sector with radius and arc length'
'Sector with radius and angle')
ParentFont = False
TabOrder = 3
OnClick = SectorGroupClick
end
object SectorClearBtn: TBitBtn
Left = 172
Top = 200
Width = 70
Height = 24
Caption = 'C&lear'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
555557777F777555F55500000000555055557777777755F75555005500055055
555577F5777F57555555005550055555555577FF577F5FF55555500550050055
5555577FF77577FF555555005050110555555577F757777FF555555505099910
555555FF75777777FF555005550999910555577F5F77777775F5500505509990
3055577F75F77777575F55005055090B030555775755777575755555555550B0
B03055555F555757575755550555550B0B335555755555757555555555555550
BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
50BB555555555555575F555555555555550B5555555555555575}
NumGlyphs = 2
end
object SectorSolveBtn: TBitBtn
Left = 246
Top = 200
Width = 70
Height = 24
Caption = '&Solve'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
OnClick = SectorSolveBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
0333337F777777737F333308888888880333337F333333337F33330888888888
03333373FFFFFFFF733333700000000073333337777777773333}
NumGlyphs = 2
end
object SectorCloseBtn: TBitBtn
Left = 320
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
Kind = bkClose
end
object SectorHelpBtn: TBitBtn
Left = 394
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
OnClick = AreaHelpBtnClick
Kind = bkHelp
end
object SectorArcEdit: TMemo
Left = 300
Top = 84
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'System'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 2
WantReturns = False
WordWrap = False
OnKeyUp = SectorArcEditKeyUp
end
end
object TabSheet10: TTabSheet
Caption = 'Segment'
object Image2: TImage
Left = 0
Top = 0
Width = 150
Height = 150
Picture.Data = {<image009.bmp>}
end
object SegmentAreaLabel: TLabel
Left = 238
Top = 22
Width = 63
Height = 16
Caption = 'Area (A) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object SegmentRadiusLabel: TLabel
Left = 229
Top = 52
Width = 72
Height = 16
Caption = 'Radius (r) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object SegmentHeightLabel: TLabel
Left = 228
Top = 82
Width = 73
Height = 16
Caption = 'Height (h) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object SegmentChordLabel: TLabel
Left = 232
Top = 112
Width = 69
Height = 16
Caption = 'Chord (c) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object SegmentArcLabel: TLabel
Left = 204
Top = 142
Width = 97
Height = 16
Caption = 'Arc length (b) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object SegmentExp: TMemo
Left = 30
Top = 156
Width = 85
Height = 75
TabStop = False
Alignment = taCenter
BorderStyle = bsNone
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
Lines.Strings = (
'Enter four '
'known '
'values, then '
#39'Solve'#39'.')
ParentColor = True
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 9
end
object SegmentAreaEdit: TMemo
Left = 316
Top = 18
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 0
WantReturns = False
WordWrap = False
OnKeyUp = SegmentAreaEditKeyUp
end
object SegmentRadiusEdit: TMemo
Left = 316
Top = 48
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 1
WantReturns = False
WordWrap = False
OnKeyUp = SegmentRadiusEditKeyUp
end
object SegmentHeightEdit: TMemo
Left = 316
Top = 78
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 2
WantReturns = False
WordWrap = False
OnKeyUp = SegmentHeightEditKeyUp
end
object SegmentChordEdit: TMemo
Left = 316
Top = 108
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 3
WantReturns = False
WordWrap = False
OnKeyUp = SegmentChordEditKeyUp
end
object SegmentArcEdit: TMemo
Left = 316
Top = 138
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 4
WantReturns = False
WordWrap = False
OnKeyUp = SegmentArcEditKeyUp
end
object SegmentClearBtn: TBitBtn
Left = 172
Top = 200
Width = 70
Height = 24
Caption = 'C&lear'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
OnClick = SegmentClearBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
555557777F777555F55500000000555055557777777755F75555005500055055
555577F5777F57555555005550055555555577FF577F5FF55555500550050055
5555577FF77577FF555555005050110555555577F757777FF555555505099910
555555FF75777777FF555005550999910555577F5F77777775F5500505509990
3055577F75F77777575F55005055090B030555775755777575755555555550B0
B03055555F555757575755550555550B0B335555755555757555555555555550
BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
50BB555555555555575F555555555555550B5555555555555575}
NumGlyphs = 2
end
object SegmentSolveBtn: TBitBtn
Left = 246
Top = 200
Width = 70
Height = 24
Caption = '&Solve'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnClick = SegmentSolveBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
0333337F777777737F333308888888880333337F333333337F33330888888888
03333373FFFFFFFF733333700000000073333337777777773333}
NumGlyphs = 2
end
object SegmentCloseBtn: TBitBtn
Left = 320
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
Kind = bkClose
end
object SegmentHelpBtn: TBitBtn
Left = 394
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
OnClick = AreaHelpBtnClick
Kind = bkHelp
end
end
object TabSheet11: TTabSheet
Caption = 'Square'
object SquareImage: TImage
Left = 0
Top = 0
Width = 150
Height = 150
Picture.Data = {<image010.bmp>}
end
object SquareAreaLabel: TLabel
Left = 242
Top = 22
Width = 63
Height = 16
Caption = 'Area (A) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object SquareSideLabel: TLabel
Left = 249
Top = 58
Width = 56
Height = 16
Caption = 'side (s) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object SquareDiagonalLabel: TLabel
Left = 217
Top = 96
Width = 88
Height = 16
Caption = 'diagonal (d) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object SquareMemo: TMemo
Left = 36
Top = 158
Width = 85
Height = 69
TabStop = False
Alignment = taCenter
BorderStyle = bsNone
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
Lines.Strings = (
'Enter any '
'known '
'value, then '
#39'Solve'#39'.')
ParentColor = True
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 7
end
object SquareAreaEdit: TMemo
Left = 320
Top = 18
Width = 129
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 10
ParentFont = False
TabOrder = 0
WantReturns = False
WordWrap = False
OnKeyUp = SquareAreaEditKeyUp
end
object SquareSideEdit: TMemo
Left = 320
Top = 56
Width = 129
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 10
ParentFont = False
TabOrder = 1
WantReturns = False
WordWrap = False
OnKeyUp = SquareSideEditKeyUp
end
object SquareDiagonalEdit: TMemo
Left = 320
Top = 94
Width = 129
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 10
ParentFont = False
TabOrder = 2
WantReturns = False
WordWrap = False
OnKeyUp = SquareDiagonalEditKeyUp
end
object SquareClearBtn: TBitBtn
Left = 172
Top = 200
Width = 70
Height = 24
Caption = 'C&lear'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnClick = SquareClearBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
555557777F777555F55500000000555055557777777755F75555005500055055
555577F5777F57555555005550055555555577FF577F5FF55555500550050055
5555577FF77577FF555555005050110555555577F757777FF555555505099910
555555FF75777777FF555005550999910555577F5F77777775F5500505509990
3055577F75F77777575F55005055090B030555775755777575755555555550B0
B03055555F555757575755550555550B0B335555755555757555555555555550
BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
50BB555555555555575F555555555555550B5555555555555575}
NumGlyphs = 2
end
object SquareSolveBtn: TBitBtn
Left = 246
Top = 200
Width = 70
Height = 24
Caption = '&Solve'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnClick = SquareSolveBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
0333337F777777737F333308888888880333337F333333337F33330888888888
03333373FFFFFFFF733333700000000073333337777777773333}
NumGlyphs = 2
end
object SquareCloseButton: TBitBtn
Left = 320
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
Kind = bkClose
end
object SquareHelpButton: TBitBtn
Left = 394
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnClick = AreaHelpBtnClick
Kind = bkHelp
end
end
object TabSheet12: TTabSheet
Caption = 'Spandrel'
object SpandrelImage: TImage
Left = 0
Top = 0
Width = 150
Height = 150
Picture.Data = {<image011.bmp>}
end
object SpandrelAreaLabel: TLabel
Left = 242
Top = 22
Width = 63
Height = 16
Caption = 'Area (A) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object SpandrelRadiusLabel: TLabel
Left = 233
Top = 54
Width = 72
Height = 16
Caption = 'Radius (r) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object SpandrelChordLabel: TLabel
Left = 236
Top = 92
Width = 69
Height = 16
Caption = 'Chord (c) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Memo2: TMemo
Left = 30
Top = 172
Width = 91
Height = 53
TabStop = False
Alignment = taCenter
BorderStyle = bsNone
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
Lines.Strings = (
'Enter any '
'value, then '
#39'Solve'#39'.')
ParentColor = True
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 7
end
object SpandrelAreaEdit: TMemo
Left = 322
Top = 18
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 0
WantReturns = False
WordWrap = False
OnKeyUp = SpandrelAreaEditKeyUp
end
object SpandrelRadiusEdit: TMemo
Left = 322
Top = 52
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 1
WantReturns = False
WordWrap = False
OnKeyUp = SpandrelRadiusEditKeyUp
end
object SpandrelChordEdit: TMemo
Left = 322
Top = 86
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 2
WantReturns = False
WordWrap = False
OnKeyUp = SpandrelChordEditKeyUp
end
object SpandrelClearBtn: TBitBtn
Left = 172
Top = 200
Width = 70
Height = 24
Caption = 'C&lear'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnClick = SpandrelClearBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
555557777F777555F55500000000555055557777777755F75555005500055055
555577F5777F57555555005550055555555577FF577F5FF55555500550050055
5555577FF77577FF555555005050110555555577F757777FF555555505099910
555555FF75777777FF555005550999910555577F5F77777775F5500505509990
3055577F75F77777575F55005055090B030555775755777575755555555550B0
B03055555F555757575755550555550B0B335555755555757555555555555550
BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
50BB555555555555575F555555555555550B5555555555555575}
NumGlyphs = 2
end
object SpandrelSolveBtn: TBitBtn
Left = 246
Top = 200
Width = 70
Height = 24
Caption = '&Solve'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnClick = SpandrelSolveBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
0333337F777777737F333308888888880333337F333333337F33330888888888
03333373FFFFFFFF733333700000000073333337777777773333}
NumGlyphs = 2
end
object SpandrelCloseBtn: TBitBtn
Left = 320
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
Kind = bkClose
end
object SpandrelHelpBtn: TBitBtn
Left = 394
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnClick = AreaHelpBtnClick
Kind = bkHelp
end
end
object TabSheet13: TTabSheet
Caption = 'Trapezium'
object Image1: TImage
Left = 0
Top = 0
Width = 150
Height = 150
Picture.Data = {<image012.bmp>}
end
object TrapeziumAreaLabel: TLabel
Left = 240
Top = 12
Width = 63
Height = 16
Alignment = taRightJustify
Caption = 'Area (A) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object TrapeziumASideLabel: TLabel
Left = 227
Top = 40
Width = 76
Height = 16
Alignment = taRightJustify
Caption = 'Length (a) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object TrapeziumBSideLabel: TLabel
Left = 227
Top = 67
Width = 76
Height = 16
Alignment = taRightJustify
Caption = 'Length (b) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object TrapeziumCSideLabel: TLabel
Left = 228
Top = 95
Width = 75
Height = 16
Alignment = taRightJustify
Caption = 'Length (c) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object TrapeziumGSideLabel: TLabel
Left = 230
Top = 124
Width = 73
Height = 16
Alignment = taRightJustify
Caption = 'Height (g) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object TrapeziumHSideLabel: TLabel
Left = 230
Top = 152
Width = 73
Height = 16
Alignment = taRightJustify
Caption = 'Height (h) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object TrapeziumExp: TMemo
Left = 16
Top = 168
Width = 115
Height = 53
TabStop = False
Alignment = taCenter
BorderStyle = bsNone
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
Lines.Strings = (
'Enter five known '
'values, then '
#39'Solve'#39'.')
ParentColor = True
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 10
end
object TrapeziumAreaEdit: TMemo
Left = 320
Top = 8
Width = 129
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 0
WantReturns = False
WordWrap = False
OnKeyUp = TrapeziumAreaEditKeyUp
end
object TrapeziumASideEdit: TMemo
Left = 320
Top = 36
Width = 129
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 1
WantReturns = False
WordWrap = False
OnKeyUp = TrapeziumASideEditKeyUp
end
object TrapeziumBSideEdit: TMemo
Left = 320
Top = 64
Width = 129
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 2
WantReturns = False
WordWrap = False
OnKeyUp = TrapeziumBSideEditKeyUp
end
object TrapeziumCSideEdit: TMemo
Left = 320
Top = 92
Width = 129
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 3
WantReturns = False
WordWrap = False
OnKeyUp = TrapeziumCSideEditKeyUp
end
object TrapeziumGSideEdit: TMemo
Left = 320
Top = 120
Width = 129
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 4
WantReturns = False
WordWrap = False
OnKeyUp = TrapeziumGSideEditKeyUp
end
object TrapeziumHSideEdit: TMemo
Left = 320
Top = 148
Width = 129
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 5
WantReturns = False
WordWrap = False
OnKeyUp = TrapeziumHSideEditKeyUp
end
object TrapeziumClearBtn: TBitBtn
Left = 172
Top = 200
Width = 70
Height = 24
Caption = 'C&lear'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnClick = TrapeziumClearBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
555557777F777555F55500000000555055557777777755F75555005500055055
555577F5777F57555555005550055555555577FF577F5FF55555500550050055
5555577FF77577FF555555005050110555555577F757777FF555555505099910
555555FF75777777FF555005550999910555577F5F77777775F5500505509990
3055577F75F77777575F55005055090B030555775755777575755555555550B0
B03055555F555757575755550555550B0B335555755555757555555555555550
BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
50BB555555555555575F555555555555550B5555555555555575}
NumGlyphs = 2
end
object TrapeziumSolveBtn: TBitBtn
Left = 246
Top = 200
Width = 70
Height = 24
Caption = '&Solve'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
OnClick = TrapeziumSolveBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
0333337F777777737F333308888888880333337F333333337F33330888888888
03333373FFFFFFFF733333700000000073333337777777773333}
NumGlyphs = 2
end
object TrapeziumCloseBtn: TBitBtn
Left = 320
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
Kind = bkClose
end
object TrapeziumHelpBtn: TBitBtn
Left = 394
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 9
OnClick = AreaHelpBtnClick
Kind = bkHelp
end
end
object TabSheet14: TTabSheet
Caption = 'Trapezoid'
object TrapImage: TImage
Left = 0
Top = 0
Width = 150
Height = 150
Picture.Data = {<image013.bmp>}
end
object TrapezoidAreaLabel: TLabel
Left = 244
Top = 22
Width = 63
Height = 16
Caption = 'Area (A) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object TrapezoidASideLabel: TLabel
Left = 246
Top = 56
Width = 61
Height = 16
Caption = 'Side (a) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object TrapezoidBSideLabel: TLabel
Left = 246
Top = 88
Width = 61
Height = 16
Caption = 'Side (b) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object TrapezoidHeightLabel: TLabel
Left = 234
Top = 120
Width = 73
Height = 16
Caption = 'Height (h) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object TrapezoidLabel: TMemo
Left = 24
Top = 164
Width = 109
Height = 59
TabStop = False
Alignment = taCenter
BorderStyle = bsNone
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
Lines.Strings = (
'Enter three '
'known values, '
'then '#39'Solve'#39'.')
ParentColor = True
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 8
end
object TrapezoidAreaEdit: TMemo
Left = 318
Top = 20
Width = 129
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 0
WantReturns = False
WordWrap = False
OnKeyUp = TrapezoidAreaEditKeyUp
end
object TrapezoidASideEdit: TMemo
Left = 318
Top = 52
Width = 129
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 1
WantReturns = False
WordWrap = False
OnKeyUp = TrapezoidASideEditKeyUp
end
object TrapezoidBSideEdit: TMemo
Left = 318
Top = 84
Width = 129
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 2
WantReturns = False
WordWrap = False
OnKeyUp = TrapezoidBSideEditKeyUp
end
object TrapezoidHeightEdit: TMemo
Left = 318
Top = 116
Width = 129
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 3
WantReturns = False
WordWrap = False
OnKeyUp = TrapezoidHeightEditKeyUp
end
object TrapezoidClearBtn: TBitBtn
Left = 172
Top = 200
Width = 70
Height = 24
Caption = 'C&lear'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnClick = TrapezoidClearBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
555557777F777555F55500000000555055557777777755F75555005500055055
555577F5777F57555555005550055555555577FF577F5FF55555500550050055
5555577FF77577FF555555005050110555555577F757777FF555555505099910
555555FF75777777FF555005550999910555577F5F77777775F5500505509990
3055577F75F77777575F55005055090B030555775755777575755555555550B0
B03055555F555757575755550555550B0B335555755555757555555555555550
BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
50BB555555555555575F555555555555550B5555555555555575}
NumGlyphs = 2
end
object TrapezoidSolveBtn: TBitBtn
Left = 246
Top = 200
Width = 70
Height = 24
Caption = '&Solve'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
OnClick = TrapezoidSolveBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
0333337F777777737F333308888888880333337F333333337F33330888888888
03333373FFFFFFFF733333700000000073333337777777773333}
NumGlyphs = 2
end
object TrapezoidCloseBtn: TBitBtn
Left = 320
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
Kind = bkClose
end
object TrapezoidHelpBtn: TBitBtn
Left = 394
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
OnClick = AreaHelpBtnClick
Kind = bkHelp
end
end
object TabSheet15: TTabSheet
Caption = 'Triangle'
object TriangleImage2: TImage
Left = 0
Top = 0
Width = 151
Height = 151
Picture.Data = {<image014.bmp>}
end
object TriangleAreaLabel: TLabel
Left = 240
Top = 10
Width = 63
Height = 16
Caption = 'Area (A) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Triangle2ASideLabel: TLabel
Left = 242
Top = 40
Width = 61
Height = 16
Caption = 'Side (a) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object TriangleBaseLabel: TLabel
Left = 240
Top = 70
Width = 63
Height = 16
Caption = 'Base (b) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Triangle2CSideLabel: TLabel
Left = 243
Top = 100
Width = 60
Height = 16
Caption = 'Side (c) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object TriangleHeightLabel: TLabel
Left = 230
Top = 40
Width = 73
Height = 16
Caption = 'Height (h) ='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object TriangleImage1: TImage
Left = 2
Top = 2
Width = 150
Height = 150
Picture.Data = {<image015.bmp>}
end
object TriangleExp: TMemo
Left = 2
Top = 158
Width = 149
Height = 69
TabStop = False
Alignment = taCenter
BorderStyle = bsNone
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
Lines.Strings = (
'Enter two known '
'values, then '#39'Solve'#39'.')
ParentColor = True
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 10
end
object TriangleAreaEdit: TMemo
Left = 316
Top = 6
Width = 130
Height = 26
TabStop = False
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 0
WantReturns = False
WordWrap = False
OnKeyUp = TriangleAreaEditKeyUp
end
object Triangle2ASideEdit: TMemo
Left = 316
Top = 36
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 9
WantReturns = False
WordWrap = False
OnKeyUp = Triangle2ASideEditKeyUp
end
object TriangleBSideEdit: TMemo
Left = 316
Top = 66
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 2
WantReturns = False
WordWrap = False
OnKeyUp = TriangleBSideEditKeyUp
end
object Triangle2CSideEdit: TMemo
Left = 316
Top = 96
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 3
Visible = False
WantReturns = False
WordWrap = False
OnKeyUp = Triangle2CSideEditKeyUp
end
object TriangleTypeGroup: TRadioGroup
Left = 204
Top = 128
Width = 229
Height = 59
Caption = 'Triangle Type'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ItemIndex = 0
Items.Strings = (
'Triangle with base and height'
'Triangle with all sides')
ParentFont = False
TabOrder = 4
OnClick = TriangleTypeGroupClick
end
object TriangleClearBtn: TBitBtn
Left = 172
Top = 200
Width = 70
Height = 24
Caption = 'C&lear'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
OnClick = TriangleClearBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
555557777F777555F55500000000555055557777777755F75555005500055055
555577F5777F57555555005550055555555577FF577F5FF55555500550050055
5555577FF77577FF555555005050110555555577F757777FF555555505099910
555555FF75777777FF555005550999910555577F5F77777775F5500505509990
3055577F75F77777575F55005055090B030555775755777575755555555550B0
B03055555F555757575755550555550B0B335555755555757555555555555550
BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
50BB555555555555575F555555555555550B5555555555555575}
NumGlyphs = 2
end
object TriangleSolveBtn: TBitBtn
Left = 246
Top = 200
Width = 70
Height = 24
Caption = '&Solve'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnClick = TriangleSolveBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
0333337F777777737F333308888888880333337F333333337F33330888888888
03333373FFFFFFFF733333700000000073333337777777773333}
NumGlyphs = 2
end
object TriangleCloseBtn: TBitBtn
Left = 320
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
Kind = bkClose
end
object TriangleHelpBtn: TBitBtn
Left = 394
Top = 200
Width = 70
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
OnClick = AreaHelpBtnClick
Kind = bkHelp
end
object TriangleHeightEdit: TMemo
Left = 316
Top = 36
Width = 130
Height = 26
Alignment = taRightJustify
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 15
ParentFont = False
TabOrder = 1
WantReturns = False
WordWrap = False
OnKeyUp = TriangleHeightEditKeyUp
end
end
end
end